https://walkerke.github.io/tidycensus/articles/basic-usage.html
## Simple feature collection with 6 features and 5 fields
## geometry type: MULTIPOLYGON
## dimension: XY
## bbox: xmin: -83.75863 ymin: 42.26068 xmax: -83.72033 ymax: 42.29117
## epsg (SRID): 4269
## proj4string: +proj=longlat +datum=NAD83 +no_defs
## GEOID NAME variable
## 1 26161400100 Census Tract 4001, Washtenaw County, Michigan B19013_001
## 2 26161400200 Census Tract 4002, Washtenaw County, Michigan B19013_001
## 3 26161400300 Census Tract 4003, Washtenaw County, Michigan B19013_001
## 4 26161400400 Census Tract 4004, Washtenaw County, Michigan B19013_001
## 5 26161400500 Census Tract 4005, Washtenaw County, Michigan B19013_001
## 6 26161400600 Census Tract 4006, Washtenaw County, Michigan B19013_001
## estimate moe geometry
## 1 34625 10975 MULTIPOLYGON (((-83.75217 4...
## 2 38403 16912 MULTIPOLYGON (((-83.7431 42...
## 3 34280 9044 MULTIPOLYGON (((-83.74315 4...
## 4 109338 15489 MULTIPOLYGON (((-83.74047 4...
## 5 22365 8032 MULTIPOLYGON (((-83.75064 4...
## 6 59551 14879 MULTIPOLYGON (((-83.75863 4...
Washtenaw %>% # data
ggplot(aes(fill=estimate)) + # ggplot
geom_sf() + # geom for shapefiles
labs(title = "Quick Map: Washtenaw County",
subtitle = "Median Family Income") +
scale_fill_viridis_c() # viridis colorshttps://github.com/gadenbuie/ggpomological
library(ggpomological)
Washtenaw %>% # data
ggplot(aes(fill=estimate)) + # ggplot
geom_sf() + # geom for shapefiles
labs(title = "Quick Map: Washtenaw County",
subtitle = "Median Family Income") +
scale_fill_distiller(palette = "Greens") +
theme_pomological_fancy()https://jrnold.github.io/ggthemes/
library(ggthemes)
Washtenaw %>% # data
ggplot(aes(fill=estimate)) + # ggplot
geom_sf() + # geom for shapefiles
labs(title = "Quick Map: Washtenaw County",
subtitle = "Median Family Income") +
theme_wsj() +
theme(title = element_text(size = rel(.75)),
axis.text = element_text(size = rel(.5)),
legend.text = element_text(size = rel(.5)))Washtenaw %>% # data
ggplot(aes(fill=estimate)) + # ggplot
geom_sf() + # geom for shapefiles
labs(title = "Quick Map: Washtenaw County",
subtitle = "Median Family Income") +
theme_economist() +
scale_fill_distiller(palette = "greens",
direction = 1) +
theme(title = element_text(size = rel(.75)),
axis.text = element_text(size = rel(.5)),
legend.text = element_text(size = rel(.5)))Washtenaw %>% # data
ggplot(aes(fill=estimate)) + # ggplot
geom_sf() + # geom for shapefiles
labs(title = "Quick Map: Washtenaw County",
subtitle = "Median Family Income") +
theme_fivethirtyeight() +
theme(title = element_text(size = rel(.75)),
axis.text = element_text(size = rel(.5)),
legend.text = element_text(size = rel(.5)))darkunicalibrary(ggthemes)
Washtenaw %>% # data
ggplot(aes(fill=estimate)) + # ggplot
geom_sf(alpha=.75) + # geom for shapefiles
labs(title = "Quick Map: Washtenaw County",
subtitle = "Median Family Income") +
scale_fill_gradient(low = "green",
high = "darkgreen") +
theme_hc(bgcolor = "darkunica") +
theme(title = element_text(size = rel(.75),
color = "green"),
axis.text = element_text(size = rel(.5),
color = "green"),
legend.text = element_text(size = rel(.5),
color = "green"))